home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / ASSEMBLE / H145.ZIP / ASXXXX_4.ZIP / T6811.ASM < prev    next >
Assembly Source File  |  1990-07-18  |  17KB  |  908 lines
  1.     .title    AS6811 Assembler Test
  2.  
  3.     .area    DIRECT
  4.  
  5.     .blkb    0x33
  6. dir:    .byte    0,0
  7.  
  8.     ext    =    0x1122
  9.     offset    =    0x0044
  10.  
  11.     .area    AS6811
  12.  
  13.     .setdp    0,DIRECT
  14.  
  15.     aba            ;1B
  16.     abx            ;3A
  17.     aby            ;18 3A
  18.  
  19.     adca    #0x10        ;89 10
  20.     adca    *dir        ;99 33
  21.     adca    ,x        ;A9 00
  22.     adca    *dir,x        ;A9 33
  23.     adca    offset,x    ;A9 44
  24.     adca    ,y        ;18 A9 00
  25.     adca    *dir,y        ;18 A9 33
  26.     adca    offset,y    ;18 A9 44
  27.     adca    ext        ;B9 11 22
  28.  
  29.     adcb    #0x10        ;C9 10
  30.     adcb    *dir        ;D9 33
  31.     adcb    ,x        ;E9 00
  32.     adcb    *dir,x        ;E9 33
  33.     adcb    offset,x    ;E9 44
  34.     adcb    ,y        ;18 E9 00
  35.     adcb    *dir,y        ;18 E9 33
  36.     adcb    offset,y    ;18 E9 44
  37.     adcb    ext        ;F9 11 22
  38.  
  39.     adc a    #0x10        ;89 10
  40.     adc a    *dir        ;99 33
  41.     adc a    ,x        ;A9 00
  42.     adc a    *dir,x        ;A9 33
  43.     adc a    offset,x    ;A9 44
  44.     adc a    ,y        ;18 A9 00
  45.     adc a    *dir,y        ;18 A9 33
  46.     adc a    offset,y    ;18 A9 44
  47.     adc a    ext        ;B9 11 22
  48.  
  49.     adc b    #0x10        ;C9 10
  50.     adc b    *dir        ;D9 33
  51.     adc b    ,x        ;E9 00
  52.     adc b    *dir,x        ;E9 33
  53.     adc b    offset,x    ;E9 44
  54.     adc b    ,y        ;18 E9 00
  55.     adc b    *dir,y        ;18 E9 33
  56.     adc b    offset,y    ;18 E9 44
  57.     adc b    ext        ;F9 11 22
  58.  
  59.     adda    #0x10        ;8B 10
  60.     adda    *dir        ;9B 33
  61.     adda    ,x        ;AB 00
  62.     adda    *dir,x        ;AB 33
  63.     adda    offset,x    ;AB 44
  64.     adda    ,y        ;18 AB 00
  65.     adda    *dir,y        ;18 AB 33
  66.     adda    offset,y    ;18 AB 44
  67.     adda    ext        ;BB 11 22
  68.  
  69.     addb    #0x10        ;CB 10
  70.     addb    *dir        ;DB 33
  71.     addb    ,x        ;EB 00
  72.     addb    *dir,x        ;EB 33
  73.     addb    offset,x    ;EB 44
  74.     addb    ,y        ;18 EB 00
  75.     addb    *dir,y        ;18 EB 33
  76.     addb    offset,y    ;18 EB 44
  77.     addb    ext        ;FB 11 22
  78.  
  79.     addd    #0x5566        ;C3 55 66
  80.     addd    *dir        ;D3 33
  81.     addd    ,x        ;E3 00
  82.     addd    *dir,x        ;E3 33
  83.     addd    offset,x    ;E3 44
  84.     addd    ,y        ;18 E3 00
  85.     addd    *dir,y        ;18 E3 33
  86.     addd    offset,y    ;18 E3 44
  87.     addd    ext        ;F3 11 22
  88.  
  89.     add a    #0x10        ;8B 10
  90.     add a    *dir        ;9B 33
  91.     add a    ,x        ;AB 00
  92.     add a    *dir,x        ;AB 33
  93.     add a    offset,x    ;AB 44
  94.     add a    ,y        ;18 AB 00
  95.     add a    *dir,y        ;18 AB 33
  96.     add a    offset,y    ;18 AB 44
  97.     add a    ext        ;BB 11 22
  98.  
  99.     add b    #0x10        ;CB 10
  100.     add b    *dir        ;DB 33
  101.     add b    ,x        ;EB 00
  102.     add b    *dir,x        ;EB 33
  103.     add b    offset,x    ;EB 44
  104.     add b    ,y        ;18 EB 00
  105.     add b    *dir,y        ;18 EB 33
  106.     add b    offset,y    ;18 EB 44
  107.     add b    ext        ;FB 11 22
  108.  
  109.     add d    #0x5566        ;C3 55 66
  110.     add d    *dir        ;D3 33
  111.     add d    ,x        ;E3 00
  112.     add d    *dir,x        ;E3 33
  113.     add d    offset,x    ;E3 44
  114.     add d    ,y        ;18 E3 00
  115.     add d    *dir,y        ;18 E3 33
  116.     add d    offset,y    ;18 E3 44
  117.     add d    ext        ;F3 11 22
  118.  
  119.     anda    #0x10        ;84 10
  120.     anda    *dir        ;94 33
  121.     anda    ,x        ;A4 00
  122.     anda    *dir,x        ;A4 33
  123.     anda    offset,x    ;A4 44
  124.     anda    ,y        ;18 A4 00
  125.     anda    *dir,y        ;18 A4 33
  126.     anda    offset,y    ;18 A4 44
  127.     anda    ext        ;B4 11 22
  128.  
  129.     andb    #0x10        ;C4 10
  130.     andb    *dir        ;D4 33
  131.     andb    ,x        ;E4 00
  132.     andb    *dir,x        ;E4 33
  133.     andb    offset,x    ;E4 44
  134.     andb    ,y        ;18 E4 00
  135.     andb    *dir,y        ;18 E4 33
  136.     andb    offset,y    ;18 E4 44
  137.     andb    ext        ;F4 11 22
  138.  
  139.     and a    #0x10        ;84 10
  140.     and a    *dir        ;94 33
  141.     and a    ,x        ;A4 00
  142.     and a    *dir,x        ;A4 33
  143.     and a    offset,x    ;A4 44
  144.     and a    ,y        ;18 A4 00
  145.     and a    *dir,y        ;18 A4 33
  146.     and a    offset,y    ;18 A4 44
  147.     and a    ext        ;B4 11 22
  148.  
  149.     and b    #0x10        ;C4 10
  150.     and b    *dir        ;D4 33
  151.     and b    ,x        ;E4 00
  152.     and b    *dir,x        ;E4 33
  153.     and b    offset,x    ;E4 44
  154.     and b    ,y        ;18 E4 00
  155.     and b    *dir,y        ;18 E4 33
  156.     and b    offset,y    ;18 E4 44
  157.     and b    ext        ;F4 11 22
  158.  
  159.     asla            ;48
  160.     aslb            ;58
  161.     asld            ;05
  162.  
  163.     asl a            ;48
  164.     asl b            ;58
  165.     asl d            ;05
  166.     asl    ,x        ;68 00
  167.     asl    *dir,x        ;68 33
  168.     asl    offset,x    ;68 44
  169.     asl    ,y        ;18 68 00
  170.     asl    *dir,y        ;18 68 33
  171.     asl    offset,y    ;18 68 44
  172.     asl    *dir        ;78 00 33
  173.     asl    ext        ;78 11 22
  174.  
  175.     asra            ;47
  176.     asrb            ;57
  177.  
  178.     asr a            ;47
  179.     asr b            ;57
  180.     asr    ,x        ;67 00
  181.     asr    *dir,x        ;67 33
  182.     asr    offset,x    ;67 44
  183.     asr    ,y        ;18 67 00
  184.     asr    *dir,y        ;18 67 33
  185.     asr    offset,y    ;18 67 44
  186.     asr    *dir        ;77 00 33
  187.     asr    ext        ;77 11 22
  188.  
  189.     bclr    *dir,    #0x5A    ;15 33 5A
  190.     bclr    *dir,x,    #0x5C    ;1D 33 5C
  191.     bclr  offset,x,    #0x5D    ;1D 44 5D
  192.     bclr    *dir,y,    #0x5C    ;18 1D 33 5C
  193.     bclr  offset,y,    #0x5D    ;18 1D 44 5D
  194.  
  195.     bita    #0x10        ;85 10
  196.     bita    *dir        ;95 33
  197.     bita    ,x        ;A5 00
  198.     bita    *dir,x        ;A5 33
  199.     bita    offset,x    ;A5 44
  200.     bita    ,y        ;18 A5 00
  201.     bita    *dir,y        ;18 A5 33
  202.     bita    offset,y    ;18 A5 44
  203.     bita    ext        ;B5 11 22
  204.  
  205.     bitb    #0x10        ;C5 10
  206.     bitb    *dir        ;D5 33
  207.     bitb    ,x        ;E5 00
  208.     bitb    *dir,x        ;E5 33
  209.     bitb    offset,x    ;E5 44
  210.     bitb    ,y        ;18 E5 00
  211.     bitb    *dir,y        ;18 E5 33
  212.     bitb    offset,y    ;18 E5 44
  213.     bitb    ext        ;F5 11 22
  214.  
  215.     bit a    #0x10        ;85 10
  216.     bit a    *dir        ;95 33
  217.     bit a    ,x        ;A5 00
  218.     bit a    *dir,x        ;A5 33
  219.     bit a    offset,x    ;A5 44
  220.     bit a    ,y        ;18 A5 00
  221.     bit a    *dir,y        ;18 A5 33
  222.     bit a    offset,y    ;18 A5 44
  223.     bit a    ext        ;B5 11 22
  224.  
  225.     bit b    #0x10        ;C5 10
  226.     bit b    *dir        ;D5 33
  227.     bit b    ,x        ;E5 00
  228.     bit b    *dir,x        ;E5 33
  229.     bit b    offset,x    ;E5 44
  230.     bit b    ,y        ;18 E5 00
  231.     bit b    *dir,y        ;18 E5 33
  232.     bit b    offset,y    ;18 E5 44
  233.     bit b    ext        ;F5 11 22
  234.  
  235. 1$:    brclr    *dir, #0x5A, 1$    ;13 33 5A FC
  236.     brclr *dir,x, #0x5C, 1$    ;1F 33 5C F8
  237.     brclr offset,x,#0x5D,1$    ;1F 44 5D F4
  238.     brclr *dir,y, #0x5C, 1$    ;18 1F 33 5C EF
  239.     brclr offset,y,#0x5D,1$    ;18 1F 44 5D EA
  240.  
  241. 2$:    brset    *dir, #0x5A, 2$    ;12 33 5A FC
  242.     brset *dir,x, #0x5C, 2$    ;1E 33 5C F8
  243.     brset offset,x,#0x5D,2$    ;1E 44 5D F4
  244.     brset *dir,y, #0x5C, 2$    ;18 1E 33 5C EF
  245.     brset offset,y,#0x5D,2$    ;18 1E 44 5D EA
  246.  
  247.     bra    .        ;20 FE
  248.     brn    .        ;21 FE
  249.     bhi    .        ;22 FE
  250.     bls    .        ;23 FE
  251.     bcc    .        ;24 FE
  252.     bhs    .        ;24 FE
  253.     bcs    .        ;25 FE
  254.     blo    .        ;25 FE
  255.     bne    .        ;26 FE
  256.     beq    .        ;27 FE
  257.     bvc    .        ;28 FE
  258.     bvs    .        ;29 FE
  259.     bpl    .        ;2A FE
  260.     bmi    .        ;2B FE
  261.     bge    .        ;2C FE
  262.     blt    .        ;2D FE
  263.     bgt    .        ;2E FE
  264.     ble    .        ;2F FE
  265.  
  266.     bsr    .        ;8D FE
  267.  
  268.     bset    *dir,    #0x5A    ;14 33 5A
  269.     bset     *dir,x,    #0x5C    ;1C 33 5C
  270.     bset  offset,x,    #0x5D    ;1C 44 5D
  271.     bset     *dir,y,    #0x5C    ;18 1C 33 5C
  272.     bset  offset,y,    #0x5D    ;18 1C 44 5D
  273.  
  274.     cba            ;11
  275.  
  276.     clc            ;0C
  277.  
  278.     cli            ;0E
  279.  
  280.     clra            ;4F
  281.     clrb            ;5F
  282.  
  283.     clr a            ;4F
  284.     clr b            ;5F
  285.     clr    ,x        ;6F 00
  286.     clr    *dir,x        ;6F 33
  287.     clr    offset,x    ;6F 44
  288.     clr    ,y        ;18 6F 00
  289.     clr    *dir,y        ;18 6F 33
  290.     clr    offset,y    ;18 6F 44
  291.     clr    *dir        ;7F 00 33
  292.     clr    ext        ;7F 11 22
  293.  
  294.     clv            ;0A
  295.  
  296.     cmpa    #0x10        ;81 10
  297.     cmpa    *dir        ;91 33
  298.     cmpa    ,x        ;A1 00
  299.     cmpa    *dir,x        ;A1 33
  300.     cmpa    offset,x    ;A1 44
  301.     cmpa    ,y        ;18 A1 00
  302.     cmpa    *dir,y        ;18 A1 33
  303.     cmpa    offset,y    ;18 A1 44
  304.     cmpa    ext        ;B1 11 22
  305.  
  306.     cmpb    #0x10        ;C1 10
  307.     cmpb    *dir        ;D1 33
  308.     cmpb    ,x        ;E1 00
  309.     cmpb    *dir,x        ;E1 33
  310.     cmpb    offset,x    ;E1 44
  311.     cmpb    ,y        ;18 E1 00
  312.     cmpb    *dir,y        ;18 E1 33
  313.     cmpb    offset,y    ;18 E1 44
  314.     cmpb    ext        ;F1 11 22
  315.  
  316.     cmp a    #0x10        ;81 10
  317.     cmp a    *dir        ;91 33
  318.     cmp a    ,x        ;A1 00
  319.     cmp a    *dir,x        ;A1 33
  320.     cmp a    offset,x    ;A1 44
  321.     cmp a    ,y        ;18 A1 00
  322.     cmp a    *dir,y        ;18 A1 33
  323.     cmp a    offset,y    ;18 A1 44
  324.     cmp a    ext        ;B1 11 22
  325.  
  326.     cmp b    #0x10        ;C1 10
  327.     cmp b    *dir        ;D1 33
  328.     cmp b    ,x        ;E1 00
  329.     cmp b    *dir,x        ;E1 33
  330.     cmp b    offset,x    ;E1 44
  331.     cmp b    ,y        ;18 E1 00
  332.     cmp b    *dir,y        ;18 E1 33
  333.     cmp b    offset,y    ;18 E1 44
  334.     cmp b    ext        ;F1 11 22
  335.  
  336.     coma            ;43
  337.     comb            ;53
  338.  
  339.     com a            ;43
  340.     com b            ;53
  341.     com    ,x        ;63 00
  342.     com    *dir,x        ;63 33
  343.     com    offset,x    ;63 44
  344.     com    ,y        ;18 63 00
  345.     com    *dir,y        ;18 63 33
  346.     com    offset,y    ;18 63 44
  347.     com    *dir        ;73 00 33
  348.     com    ext        ;73 11 22
  349.  
  350.     cpx    #0x5566        ;8C 55 66
  351.     cpx    *dir        ;9C 33
  352.     cpx    ,x        ;AC 00
  353.     cpx    *dir,x        ;AC 33
  354.     cpx    offset,x    ;AC 44
  355.     cpx    ,y        ;CD AC 00
  356.     cpx    *dir,y        ;CD AC 33
  357.     cpx    offset,y    ;CD AC 44
  358.     cpx    ext        ;BC 11 22
  359.  
  360.     cpy    #0x5566        ;18 8C 55 66
  361.     cpy    *dir        ;18 9C 33
  362.     cpy    ,x        ;1A AC 00
  363.     cpy    *dir,x        ;1A AC 33
  364.     cpy    offset,x    ;1A AC 44
  365.     cpy    ,y        ;18 AC 00
  366.     cpy    *dir,y        ;18 AC 33
  367.     cpy    offset,y    ;18 AC 44
  368.     cpy    ext        ;18 BC 11 22
  369.  
  370.     daa            ;19
  371.  
  372.     deca            ;4A
  373.     decb            ;5A
  374.  
  375.     dec a            ;4A
  376.     dec b            ;5A
  377.     dec    ,x        ;6A 00
  378.     dec    *dir,x        ;6A 33
  379.     dec    offset,x    ;6A 44
  380.     dec    ,y        ;18 6A 00
  381.     dec    *dir,y        ;18 6A 33
  382.     dec    offset,y    ;18 6A 44
  383.     dec    *dir        ;7A 00 33
  384.     dec    ext        ;7A 11 22
  385.  
  386.     des            ;34
  387.  
  388.     dex            ;09
  389.     dey            ;18 09
  390.  
  391.     eora    #0x10        ;88 10
  392.     eora    *dir        ;98 33
  393.     eora    ,x        ;A8 00
  394.     eora    *dir,x        ;A8 33
  395.     eora    offset,x    ;A8 44
  396.     eora    ,y        ;18 A8 00
  397.     eora    *dir,y        ;18 A8 33
  398.     eora    offset,y    ;18 A8 44
  399.     eora    ext        ;B8 11 22
  400.  
  401.     eorb    #0x10        ;C8 10
  402.     eorb    *dir        ;D8 33
  403.     eorb    ,x        ;E8 00
  404.     eorb    *dir,x        ;E8 33
  405.     eorb    offset,x    ;E8 44
  406.     eorb    ,y        ;18 E8 00
  407.     eorb    *dir,y        ;18 E8 33
  408.     eorb    offset,y    ;18 E8 44
  409.     eorb    ext        ;F8 11 22
  410.  
  411.     eor a    #0x10        ;88 10
  412.     eor a    *dir        ;98 33
  413.     eor a    ,x        ;A8 00
  414.     eor a    *dir,x        ;A8 33
  415.     eor a    offset,x    ;A8 44
  416.     eor a    ,y        ;18 A8 00
  417.     eor a    *dir,y        ;18 A8 33
  418.     eor a    offset,y    ;18 A8 44
  419.     eor a    ext        ;B8 11 22
  420.  
  421.     eor b    #0x10        ;C8 10
  422.     eor b    *dir        ;D8 33
  423.     eor b    ,x        ;E8 00
  424.     eor b    *dir,x        ;E8 33
  425.     eor b    offset,x    ;E8 44
  426.     eor b    ,y        ;18 E8 00
  427.     eor b    *dir,y        ;18 E8 33
  428.     eor b    offset,y    ;18 E8 44
  429.     eor b    ext        ;F8 11 22
  430.  
  431.     fdiv            ;03
  432.  
  433.     idiv            ;02
  434.  
  435.     inca            ;4C
  436.     incb            ;5C
  437.  
  438.     inc a            ;4C
  439.     inc b            ;5C
  440.     inc    ,x        ;6C 00
  441.     inc    *dir,x        ;6C 33
  442.     inc    offset,x    ;6C 44
  443.     inc    ,y        ;18 6C 00
  444.     inc    *dir,y        ;18 6C 33
  445.     inc    offset,y    ;18 6C 44
  446.     inc    *dir        ;7C 00 33
  447.     inc    ext        ;7C 11 22
  448.  
  449.     ins            ;31
  450.  
  451.     inx            ;08
  452.     iny            ;18 08
  453.  
  454.     jmp    ,x        ;6E 00
  455.     jmp    *dir,x        ;6E 33
  456.     jmp    offset,x    ;6E 44
  457.     jmp    ,y        ;18 6E 00
  458.     jmp    *dir,y        ;18 6E 33
  459.     jmp    offset,y    ;18 6E 44
  460.     jmp    ext        ;7E 11 22
  461.  
  462.     jsr    *dir        ;9D 33
  463.     jsr    ,x        ;AD 00
  464.     jsr    *dir,x        ;AD 33
  465.     jsr    offset,x    ;AD 44
  466.     jsr    ,y        ;18 AD 00
  467.     jsr    *dir,y        ;18 AD 33
  468.     jsr    offset,y    ;18 AD 44
  469.     jsr    ext        ;BD 11 22
  470.  
  471.     ldaa    #0x10        ;86 10
  472.     ldaa    *dir        ;96 33
  473.     ldaa    ,x        ;A6 00
  474.     ldaa    *dir,x        ;A6 33
  475.     ldaa    offset,x    ;A6 44
  476.     ldaa    ,y        ;18 A6 00
  477.     ldaa    *dir,y        ;18 A6 33
  478.     ldaa    offset,y    ;18 A6 44
  479.     ldaa    ext        ;B6 11 22
  480.  
  481.     ldab    #0x10        ;C6 10
  482.     ldab    *dir        ;D6 33
  483.     ldab    ,x        ;E6 00
  484.     ldab    *dir,x        ;E6 33
  485.     ldab    offset,x    ;E6 44
  486.     ldab    ,y        ;18 E6 00
  487.     ldab    *dir,y        ;18 E6 33
  488.     ldab    offset,y    ;18 E6 44
  489.     ldab    ext        ;F6 11 22
  490.  
  491.     lda a    #0x10        ;86 10
  492.     lda a    *dir        ;96 33
  493.     lda a    ,x        ;A6 00
  494.     lda a    *dir,x        ;A6 33
  495.     lda a    offset,x    ;A6 44
  496.     lda a    ,y        ;18 A6 00
  497.     lda a    *dir,y        ;18 A6 33
  498.     lda a    offset,y    ;18 A6 44
  499.     lda a    ext        ;B6 11 22
  500.  
  501.     lda b    #0x10        ;C6 10
  502.     lda b    *dir        ;D6 33
  503.     lda b    ,x        ;E6 00
  504.     lda b    *dir,x        ;E6 33
  505.     lda b    offset,x    ;E6 44
  506.     lda b    ,y        ;18 E6 00
  507.     lda b    *dir,y        ;18 E6 33
  508.     lda b    offset,y    ;18 E6 44
  509.     lda b    ext        ;F6 11 22
  510.  
  511.     ldd    #0x5566        ;CC 55 66
  512.     ldd    *dir        ;DC 33
  513.     ldd    ,x        ;EC 00
  514.     ldd    *dir,x        ;EC 33
  515.     ldd    offset,x    ;EC 44
  516.     ldd    ,y        ;18 EC 00
  517.     ldd    *dir,y        ;18 EC 33
  518.     ldd    offset,y    ;18 EC 44
  519.     ldd    ext        ;FC 11 22
  520.  
  521.     lds    #0x5566        ;8E 55 66
  522.     lds    *dir        ;9E 33
  523.     lds    ,x        ;AE 00
  524.     lds    *dir,x        ;AE 33
  525.     lds    offset,x    ;AE 44
  526.     lds    ,y        ;18 AE 00
  527.     lds    *dir,y        ;18 AE 33
  528.     lds    offset,y    ;18 AE 44
  529.     lds    ext        ;BE 11 22
  530.  
  531.     ldx    #0x5566        ;CE 55 66
  532.     ldx    *dir        ;DE 33
  533.     ldx    ,x        ;EE 00
  534.     ldx    *dir,x        ;EE 33
  535.     ldx    offset,x    ;EE 44
  536.     ldx    ,y        ;CD EE 00
  537.     ldx    *dir,y        ;CD EE 33
  538.     ldx    offset,y    ;CD EE 44
  539.     ldx    ext        ;FE 11 22
  540.  
  541.     ldy    #0x5566        ;18 CE 55 66
  542.     ldy    *dir        ;18 DE 33
  543.     ldy    ,x        ;1A EE 00
  544.     ldy    *dir,x        ;1A EE 33
  545.     ldy    offset,x    ;1A EE 44
  546.     ldy    ,y        ;18 EE 00
  547.     ldy    *dir,y        ;18 EE 33
  548.     ldy    offset,y    ;18 EE 44
  549.     ldy    ext        ;18 FE 11 22
  550.  
  551.     lsla            ;48
  552.     lslb            ;58
  553.     lsld            ;05
  554.  
  555.     lsl a            ;48
  556.     lsl b            ;58
  557.     lsl d            ;05
  558.     lsl    ,x        ;68 00
  559.     lsl    *dir,x        ;68 33
  560.     lsl    offset,x    ;68 44
  561.     lsl    ,y        ;18 68 00
  562.     lsl    *dir,y        ;18 68 33
  563.     lsl    offset,y    ;18 68 44
  564.     lsl    *dir        ;78 00 33
  565.     lsl    ext        ;78 11 22
  566.  
  567.     lsra            ;44
  568.     lsrb            ;54
  569.     lsrd            ;04
  570.  
  571.     lsr a            ;44
  572.     lsr b            ;54
  573.     lsr d            ;04
  574.     lsr    ,x        ;64 00
  575.     lsr    *dir,x        ;64 33
  576.     lsr    offset,x    ;64 44
  577.     lsr    ,y        ;18 64 00
  578.     lsr    *dir,y        ;18 64 33
  579.     lsr    offset,y    ;18 64 44
  580.     lsr    *dir        ;74 00 33
  581.     lsr    ext        ;74 11 22
  582.  
  583.     mul            ;3D
  584.  
  585.     nega            ;40
  586.     negb            ;50
  587.  
  588.     neg a            ;40
  589.     neg b            ;50
  590.     neg    ,x        ;60 00
  591.     neg    *dir,x        ;60 33
  592.     neg    offset,x    ;60 44
  593.     neg    ,y        ;18 60 00
  594.     neg    *dir,y        ;18 60 33
  595.     neg    offset,y    ;18 60 44
  596.     neg    *dir        ;70 00 33
  597.     neg    ext        ;70 11 22
  598.  
  599.     nop            ;01
  600.  
  601.     oraa    #0x10        ;8A 10
  602.     oraa    *dir        ;9A 33
  603.     oraa    ,x        ;AA 00
  604.     oraa    *dir,x        ;AA 33
  605.     oraa    offset,x    ;AA 44
  606.     oraa    ,y        ;18 AA 00
  607.     oraa    *dir,y        ;18 AA 33
  608.     oraa    offset,y    ;18 AA 44
  609.     oraa    ext        ;BA 11 22
  610.  
  611.     orab    #0x10        ;CA 10
  612.     orab    *dir        ;DA 33
  613.     orab    ,x        ;EA 00
  614.     orab    *dir,x        ;EA 33
  615.     orab    offset,x    ;EA 44
  616.     orab    ,y        ;18 EA 00
  617.     orab    *dir,y        ;18 EA 33
  618.     orab    offset,y    ;18 EA 44
  619.     orab    ext        ;FA 11 22
  620.  
  621.     ora a    #0x10        ;8A 10
  622.     ora a    *dir        ;9A 33
  623.     ora a    ,x        ;AA 00
  624.     ora a    *dir,x        ;AA 33
  625.     ora a    offset,x    ;AA 44
  626.     ora a    ,y        ;18 AA 00
  627.     ora a    *dir,y        ;18 AA 33
  628.     ora a    offset,y    ;18 AA 44
  629.     ora a    ext        ;BA 11 22
  630.  
  631.     ora b    #0x10        ;CA 10
  632.     ora b    *dir        ;DA 33
  633.     ora b    ,x        ;EA 00
  634.     ora b    *dir,x        ;EA 33
  635.     ora b    offset,x    ;EA 44
  636.     ora b    ,y        ;18 EA 00
  637.     ora b    *dir,y        ;18 EA 33
  638.     ora b    offset,y    ;18 EA 44
  639.     ora b    ext        ;FA 11 22
  640.  
  641.     psha            ;36
  642.     pshb            ;37
  643.     pshx            ;3C
  644.     pshy            ;18 3C
  645.  
  646.     psh a            ;36
  647.     psh b            ;37
  648.     psh x            ;3C
  649.     psh y            ;18 3C
  650.  
  651.     pula            ;32
  652.     pulb            ;33
  653.     pulx            ;38
  654.     puly            ;18 38
  655.  
  656.     pul a            ;32
  657.     pul b            ;33
  658.     pul x            ;38
  659.     pul y            ;18 38
  660.  
  661.     rola            ;49
  662.     rolb            ;59
  663.  
  664.     rol a            ;49
  665.     rol b            ;59
  666.     rol    ,x        ;69 00
  667.     rol    *dir,x        ;69 33
  668.     rol    offset,x    ;69 44
  669.     rol    ,y        ;18 69 00
  670.     rol    *dir,y        ;18 69 33
  671.     rol    offset,y    ;18 69 44
  672.     rol    *dir        ;79 00 33
  673.     rol    ext        ;79 11 22
  674.  
  675.     rora            ;46
  676.     rorb            ;56
  677.  
  678.     ror a            ;46
  679.     ror b            ;56
  680.     ror    ,x        ;66 00
  681.     ror    *dir,x        ;66 33
  682.     ror    offset,x    ;66 44
  683.     ror    ,y        ;18 66 00
  684.     ror    *dir,y        ;18 66 33
  685.     ror    offset,y    ;18 66 44
  686.     ror    *dir        ;76 00 33
  687.     ror    ext        ;76 11 22
  688.  
  689.     rti            ;3B
  690.  
  691.     rts            ;39
  692.  
  693.     sba            ;10
  694.  
  695.     sbca    #0x10        ;82 10
  696.     sbca    *dir        ;92 33
  697.     sbca    ,x        ;A2 00
  698.     sbca    *dir,x        ;A2 33
  699.     sbca    offset,x    ;A2 44
  700.     sbca    ,y        ;18 A2 00
  701.     sbca    *dir,y        ;18 A2 33
  702.     sbca    offset,y    ;18 A2 44
  703.     sbca    ext        ;B2 11 22
  704.  
  705.     sbcb    #0x10        ;C2 10
  706.     sbcb    *dir        ;D2 33
  707.     sbcb    ,x        ;E2 00
  708.     sbcb    *dir,x        ;E2 33
  709.     sbcb    offset,x    ;E2 44
  710.     sbcb    ,y        ;18 E2 00
  711.     sbcb    *dir,y        ;18 E2 33
  712.     sbcb    offset,y    ;18 E2 44
  713.     sbcb    ext        ;F2 11 22
  714.  
  715.     sbc a    #0x10        ;82 10
  716.     sbc a    *dir        ;92 33
  717.     sbc a    ,x        ;A2 00
  718.     sbc a    *dir,x        ;A2 33
  719.     sbc a    offset,x    ;A2 44
  720.     sbc a    ,y        ;18 A2 00
  721.     sbc a    *dir,y        ;18 A2 33
  722.     sbc a    offset,y    ;18 A2 44
  723.     sbc a    ext        ;B2 11 22
  724.  
  725.     sbc b    #0x10        ;C2 10
  726.     sbc b    *dir        ;D2 33
  727.     sbc b    ,x        ;E2 00
  728.     sbc b    *dir,x        ;E2 33
  729.     sbc b    offset,x    ;E2 44
  730.     sbc b    ,y        ;18 E2 00
  731.     sbc b    *dir,y        ;18 E2 33
  732.     sbc b    offset,y    ;18 E2 44
  733.     sbc b    ext        ;F2 11 22
  734.  
  735.     sec            ;0D
  736.  
  737.     sei            ;0F
  738.  
  739.     sev            ;0B
  740.  
  741.     staa    *dir        ;97 33
  742.     staa    ,x        ;A7 00
  743.     staa    *dir,x        ;A7 33
  744.     staa    offset,x    ;A7 44
  745.     staa    ,y        ;18 A7 00
  746.     staa    *dir,y        ;18 A7 33
  747.     staa    offset,y    ;18 A7 44
  748.     staa    ext        ;B7 11 22
  749.  
  750.     stab    *dir        ;D7 33
  751.     stab    ,x        ;E7 00
  752.     stab    *dir,x        ;E7 33
  753.     stab    offset,x    ;E7 44
  754.     stab    ,y        ;18 E7 00
  755.     stab    *dir,y        ;18 E7 33
  756.     stab    offset,y    ;18 E7 44
  757.     stab    ext        ;F7 11 22
  758.  
  759.     sta a    *dir        ;97 33
  760.     sta a    ,x        ;A7 00
  761.     sta a    *dir,x        ;A7 33
  762.     sta a    offset,x    ;A7 44
  763.     sta a    ,y        ;18 A7 00
  764.     sta a    *dir,y        ;18 A7 33
  765.     sta a    offset,y    ;18 A7 44
  766.     sta a    ext        ;B7 11 22
  767.  
  768.     sta b    *dir        ;D7 33
  769.     sta b    ,x        ;E7 00
  770.     sta b    *dir,x        ;E7 33
  771.     sta b    offset,x    ;E7 44
  772.     sta b    ,y        ;18 E7 00
  773.     sta b    *dir,y        ;18 E7 33
  774.     sta b    offset,y    ;18 E7 44
  775.     sta b    ext        ;F7 11 22
  776.  
  777.     std    *dir        ;DD 33
  778.     std    ,x        ;ED 00
  779.     std    *dir,x        ;ED 33
  780.     std    offset,x    ;ED 44
  781.     std    ,y        ;18 ED 00
  782.     std    *dir,y        ;18 ED 33
  783.     std    offset,y    ;18 ED 44
  784.     std    ext        ;FD 11 22
  785.  
  786.     stop            ;CF
  787.  
  788.     sts    *dir        ;9F 33
  789.     sts    ,x        ;AF 00
  790.     sts    *dir,x        ;AF 33
  791.     sts    offset,x    ;AF 44
  792.     sts    ,y        ;18 AF 00
  793.     sts    *dir,y        ;18 AF 33
  794.     sts    offset,y    ;18 AF 44
  795.     sts    ext        ;BF 11 22
  796.  
  797.     stx    *dir        ;DF 33
  798.     stx    ,x        ;EF 00
  799.     stx    *dir,x        ;EF 33
  800.     stx    offset,x    ;EF 44
  801.     stx    ,y        ;CD EF 00
  802.     stx    *dir,y        ;CD EF 33
  803.     stx    offset,y    ;CD EF 44
  804.     stx    ext        ;FF 11 22
  805.  
  806.     sty    *dir        ;18 DF 33
  807.     sty    ,x        ;1A EF 00
  808.     sty    *dir,x        ;1A EF 33
  809.     sty    offset,x    ;1A EF 44
  810.     sty    ,y        ;18 EF 00
  811.     sty    *dir,y        ;18 EF 33
  812.     sty    offset,y    ;18 EF 44
  813.     sty    ext        ;18 FF 11 22
  814.  
  815.     suba    #0x10        ;80 10
  816.     suba    *dir        ;90 33
  817.     suba    ,x        ;A0 00
  818.     suba    *dir,x        ;A0 33
  819.     suba    offset,x    ;A0 44
  820.     suba    ,y        ;18 A0 00
  821.     suba    *dir,y        ;18 A0 33
  822.     suba    offset,y    ;18 A0 44
  823.     suba    ext        ;B0 11 22
  824.  
  825.     subb    #0x10        ;C0 10
  826.     subb    *dir        ;D0 33
  827.     subb    ,x        ;E0 00
  828.     subb    *dir,x        ;E0 33
  829.     subb    offset,x    ;E0 44
  830.     subb    ,y        ;18 E0 00
  831.     subb    *dir,y        ;18 E0 33
  832.     subb    offset,y    ;18 E0 44
  833.     subb    ext        ;F0 11 22
  834.  
  835.     subd    #0x5566        ;83 55 66
  836.     subd    *dir        ;93 33
  837.     subd    ,x        ;A3 00
  838.     subd    *dir,x        ;A3 33
  839.     subd    offset,x    ;A3 44
  840.     subd    ,y        ;18 A3 00
  841.     subd    *dir,y        ;18 A3 33
  842.     subd    offset,y    ;18 A3 44
  843.     subd    ext        ;B3 11 22
  844.  
  845.     sub a    #0x10        ;80 10
  846.     sub a    *dir        ;90 33
  847.     sub a    ,x        ;A0 00
  848.     sub a    *dir,x        ;A0 33
  849.     sub a    offset,x    ;A0 44
  850.     sub a    ,y        ;18 A0 00
  851.     sub a    *dir,y        ;18 A0 33
  852.     sub a    offset,y    ;18 A0 44
  853.     sub a    ext        ;B0 11 22
  854.  
  855.     sub b    #0x10        ;C0 10
  856.     sub b    *dir        ;D0 33
  857.     sub b    ,x        ;E0 00
  858.     sub b    *dir,x        ;E0 33
  859.     sub b    offset,x    ;E0 44
  860.     sub b    ,y        ;18 E0 00
  861.     sub b    *dir,y        ;18 E0 33
  862.     sub b    offset,y    ;18 E0 44
  863.     sub b    ext        ;F0 11 22
  864.  
  865.     sub d    #0x5566        ;83 55 66
  866.     sub d    *dir        ;93 33
  867.     sub d    ,x        ;A3 00
  868.     sub d    *dir,x        ;A3 33
  869.     sub d    offset,x    ;A3 44
  870.     sub d    ,y        ;18 A3 00
  871.     sub d    *dir,y        ;18 A3 33
  872.     sub d    offset,y    ;18 A3 44
  873.     sub d    ext        ;B3 11 22
  874.  
  875.     swi            ;3F
  876.  
  877.     tab            ;16
  878.  
  879.     tap            ;06
  880.  
  881.     tba            ;17
  882.  
  883.     tpa            ;07
  884.  
  885.     tsta            ;4D
  886.     tstb            ;5D
  887.  
  888.     tst a            ;4D
  889.     tst b            ;5D
  890.     tst    ,x        ;6D 00
  891.     tst    *dir,x        ;6D 33
  892.     tst    offset,x    ;6D 44
  893.     tst    ,y        ;18 6D 00
  894.     tst    *dir,y        ;18 6D 33
  895.     tst    offset,y    ;18 6D 44
  896.     tst    *dir        ;7D 00 33
  897.     tst    ext        ;7D 11 22
  898.  
  899.     tsx            ;30
  900.  
  901.     txs            ;35
  902.  
  903.     wai            ;3E
  904.  
  905.     xgdx            ;8F
  906.     xgdy            ;18 8F
  907.  
  908.